# R 语言折线图 plot(v,type,col,xlab,ylab)
# v 是包含数值得向量
# 类型 p 绘制点 I=l 绘制线 o 绘制点和线

# 类型o
v <- c(7,12,28,3,41);

png( file="line_char.png");

plot( v,type="o",col="red");

dev.off()

# 折线图标题,颜色和标签
png( file="line_char_label_colored.png");

plot(v,type="o",col="blue",xlab="Month",ylab="Rain fall",main="Rain fall chart");

dev.off();

# 多折现图
t <- c(14,7,6,9,13);

png(file="line_char_2_line.png");

plot(v,type="o",col="red",xlab="Month",ylab="Rain fall",main="Rain fall chart")

lines(t,type="o",col="blue")

dev.off();
